home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / prodpack.zip / DB4PPSRC.EXE / _FXEXSEN.PRG < prev    next >
Text File  |  1993-05-04  |  382b  |  19 lines
  1. PROCEDURE _FXExSEnv
  2. *---------------------------------------------------------------------
  3. *---------------------------------------------------------------------
  4.   gl_near = SET( "NEAR" ) = "ON"
  5.   SET NEAR OFF
  6.  
  7.   gl_exact = SET( "EXACT" ) = "ON"
  8.   SET EXACT ON
  9.  
  10.   gl_safety = SET( "SAFETY" ) = "ON"
  11.   SET SAFETY OFF
  12.  
  13.   SET CATALOG OFF
  14.  
  15. RETURN
  16. *-- EOP: _FXExSEnv
  17.  
  18.  
  19.